home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Atari Compendium
/
The Atari Compendium (Toad Computers) (1994).iso
/
files
/
umich
/
utils
/
filestuf.lzh
/
REAL.CMD
< prev
Wrap
OS/2 REXX Batch file
|
1990-08-22
|
1KB
|
72 lines
? (show buffer size at startup)
e (we use status msg instead of cmd echo)
@ 100
b
v +
s set up spectre configuration:
v -
s f1 = quantum only
s f2 = both drives
s f3 = quantum, no autoboot
s f4 = both drives, no autoboot
s undo = NO configuration file
s
s help = reread instructions
s any other key = leave as is
v +
s press a key within 5 seconds!
v -
s
p 5
keyget -- the only one we do
i /h 100 -- reread instructions
i /1 9 -- 9s to delete old file, then branch for new one
i /2 9
i /3 9
i /4 9
i /u 9
quit
;
@ 9
s erasing old config file...
d d:\mac\gcr\spectre.cnf
i /u 99 -- undo = all done now
;note: we don't check for errors here since there might not
;be an old config file (in which case the delete will fail)!
;
s copying new config file...
i /1 1
i /2 2
i /3 3
i /4 4
@ 1 quantum only
c d:\mac\gcr\quantum.cnf d:\mac\gcr\spectre.cnf
j 99
@ 2 both
c d:\mac\gcr\syquest.cnf d:\mac\gcr\spectre.cnf
j 99
@ 3 quantum, noboot
c d:\mac\gcr\qunoboot.cnf d:\mac\gcr\spectre.cnf
j 99
@ 4 both, noboot
c d:\mac\gcr\synoboot.cnf d:\mac\gcr\spectre.cnf
;
@ 99 -- ok, all done, chk for copy errors
z 255 -- error, make sure we know!
v +
s all done!
v -
w 1
b
quit
;
@ 255 -- jump here if there's an error!
v +
s
;note the bell (^G) below, and the "Z" after!
s ◆ copy operation failed!
z
v -
w 5
b